Descriptions
There is no desription for trigger PRODUCTOS_BU2
 
Definition
CREATE TRIGGER PRODUCTOS_BU2 FOR PRODUCTOS ACTIVE
BEFORE UPDATE POSITION 1
AS
declare variable PADRE INTEGER;
BEGIN
IF (NEW.ID_PADRE_PRODUCTO IS NULL or (NEW.Id_PADRE_PRODUCTO ='PADRE')) THEN
BEGIN
/* ESTE VALOR INDICA QUE SE TRATA DE UN PADRE */
NEW.ID_PADRE_PRODUCTO='PADRE';
END
ELSE
BEGIN
SELECT ID_PRODUCTOS FROM PRODUCTOS
WHERE
ID_PRODUCTOS = NEW.ID_PADRE_PRODUCTO
INTO:PADRE;
if (PADRE IS NULL) then
BEGIN
NEW.ID_PADRE_PRODUCTO ='PADRE';
EXCEPTION exception_padrenoexiste;
END
ELSE
BEGIN
NEW.ID_PADRE_PRODUCTO =PADRE;
END
END
END
| This file was generated with EMS InterBase/FireBird Manager (www.ibmanager.com) at 09/06/2005 05:52 p.m. |
|